home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / prog_bas / ivbsrc.zip / GLOBAL.BAS < prev    next >
BASIC Source File  |  1992-08-12  |  499b  |  17 lines
  1. '  OpenFile() Structure
  2. Type OFSTRUCT
  3.         cBytes As String * 1
  4.         fFixedDisk As String * 1
  5.         nErrCode As Integer
  6.         Reserved1 As String * 1
  7.         Reserved2 As String * 1
  8.         Reserved3 As String * 1
  9.         Reserved4 As String * 1
  10.         szPathName As String * 128
  11. End Type
  12.  
  13. '  OpenFile() Flags
  14. Global Const OF_EXIST = &H4000
  15.  
  16. Declare Function OpenFile Lib "Kernel" (ByVal lpFileName As String, lpReOpenBuff As OFSTRUCT, ByVal wStyle As Integer) As Integer
  17.